home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1994 June: Reference Library / Dev.CD Jun 94.toast / Periodicals / develop / develop Issue 11 / develop 11 code / The NetWork Project / Examples (Sources) / NetSim / macunits.p.orig < prev    next >
Encoding:
Text File  |  1992-07-15  |  807 b   |  43 lines  |  [TEXT/MPS ]
  1. { MacUnits.p     © Copyright G. Sawitzki, 1988-1991}
  2. {$IFC UNDEFINED UsingIncludes}
  3. {$SETC UsingIncludes:=0}
  4. {$ENDC}
  5.  
  6. {$IFC Not UsingIncludes}
  7.     UNIT MacUnits;
  8.     INTERFACE
  9. {$ENDC}
  10.  
  11. {$IFC Undefined UsingMac}
  12. {$SETC UsingMac:=1}
  13.  
  14. {$I+}
  15. {$SETC MacIncludes:=UsingIncludes}
  16. {$SETC UsingIncludes:=1}
  17.  
  18. {$IFC Undefined UsingTypes}
  19. {$I $$Shell(Pinterfaces)Types.p}
  20. {$ENDC}
  21.  
  22. {$IFC UNDEFINED UsingQuickdraw}
  23. {$I $$Shell(PInterfaces)Quickdraw.p}
  24. {$ENDC}
  25. {$IFC UNDEFINED UsingOSIntf}
  26. {$I $$Shell(PInterfaces)OSIntf.p}
  27. {$ENDC}
  28. {$IFC UNDEFINED UsingToolIntf}
  29. {$I $$Shell(PInterfaces)ToolIntf.p}
  30. {$ENDC}
  31. {$IFC UNDEFINED UsingPackIntf}
  32. {$I $$Shell(PInterfaces)PackIntf.p}
  33. {$ENDC}
  34. {$IFC UNDEFINED UsingSANE}
  35. {$I $$Shell(PInterfaces)SANE.p}
  36. {$ENDC}
  37.  
  38. {$SETC UsingIncludes:=MacIncludes}
  39.  
  40. {$ENDC}
  41. {$IFC NOT UsingIncludes}
  42. END.
  43. {$ENDC}